<%

Function apostas_usuario_rodada(id_rodada, apostas, id_usuario)

		
		str = "SELECT posicao, placar_1,placar_2 from apostas where id_rodada="&id_rodada&" AND id_usuario="&id_usuario&" order by posicao asc"
  		Set rs = conexao_geral.Execute(str)	
		
		DIM total
		
		total = 0
		
		Do while not rs.eof
		
			apostas(total,0)=rs("posicao")
			apostas(total,1)=rs("placar_1")
			apostas(total,2)=rs("placar_2")
		
			total = total+1

		rs.MoveNext		
		loop

		
		apostas_usuario_rodada = total


End Function

Function apostas_usuario_rodada_posicao(id_rodada, apostas, posicao, id_usuario)

		
		str = "SELECT posicao, placar_1,placar_2 from apostas where id_rodada="&id_rodada&" AND id_usuario="&id_usuario&"  AND posicao="&posicao&" "
  		Set rs = conexao_geral.Execute(str)	
		
		DIM total
		
		total = 0
		
		Do while not rs.eof
		
			apostas(total,0)=rs("posicao")
			apostas(total,1)=rs("placar_1")
			apostas(total,2)=rs("placar_2")
		
			total = total+1
		
		rs.MoveNext		
		loop

		
		apostas_usuario_rodada = total


End Function
%>
